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HEM EUZIHEZZ 

صا و و ا نے ti‏ 

FRED 5% 160 T TING THAT 

; ROLEROOE TO 
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TS IN NEEC 
HOT -=56 - 
REQUEST 


URS MADE THAT 
THIS MOVE WOULD GIVE COUR GROUP 


MECIA COVERAGE, AND POSSIBLY 

HEL HEMEERS FROM THE FACE WHO 

ARRE INTERESTED IN COMPUTERS, 

THE GROUP COULD GIVE CEMONSTRE - 
TIONS Te SHOW THE TRUE POWER AND 
AFFORDABILITY OF OUR Tes MACH- 
INES 5ב‎ COMPARED TO OTHERS, 

OM MAJORITY UOTE. LIST AGREED 
TO BECOME A SPONECR FOR ONE 
WEAR. FRED WOULD &DUISE THE 
LEADERSHIP OF CUESCOUT FACE Fes 


TF A NEW DIG- 
JECHASED FOR THE 
3J BOER ADVISED 
THAT HE WILL HAVE A EC UMS ד‎ = - 
TION THE NEXT MEETING 


PAUL CHOMITZ TOLLE US OF HIS Tere 
TS ENGLAND, AND DOHATED BOOKS 
BNO MAGAZINES TC THE LIST 

ا تر س75 سا 


3 =ךד. 

ج ج چو جو چو چو جو ج ج چ ججج SHEP‏ جو یو عو عو و 

CLASSIFIED SECTION IS 

AVAILABLE TO ALL LIST MEMEBERS 

FREE OF CHARGE. 

THE ONLY RESTRICTION 15 THAT 

IT Iz TO BE USED ہہ الات‎ FOR THE 

SEEKING, SELLING OR SWAPPING 

OF SINCLAIR, TIMEX OR MICEORCE 

Eis EQUIPMENT, PERIPHERALS‏ نت 
LIST. ANG ITS OFFICERS‏ 


SOFTWARE, 
LISTING. 
DO דסא‎ ENDORSE. WARRANTY. OF 
GUARANTEE ANY OF THE ITEMS 
LISTED IN THIS CLASSIFIED 
SECTION 


رر رد تد ہہ ہد ہد دید مد ویش 


THE FOLLOWING PUBLICATIONS ARE 
AVAILABLE ONLY THROUGH LIST: 


2%-51/751000 TECHNICAL TIDBITS 
TECHNICAL TIDBITS FART II 
SHUIMGZ AND LORD CF THE TIME: 
ד‎ ₪ 

$4.00 EACH. 


I AM LOOKING FOR ב‎ =CHON INTERN- 
לפת ام‎ BOARD INTERFACE WITH OR 
WITHOUT THE PC KEYBOARD IN GOOD 
CEERGTING CONDITICH.CONTRCT 

EGE GILDER AT "771 om 
55 JEFFERSON PLACE, MASSA PEGUA 
Hav. 11758 

WANTED: WAFERS FOR A-J MICRC- 
DRIVE (S085 VERSION); ARTHOR™: 
SOG STUFF טסל‎ WAHT TO SELL. 
MIKE TEPHEN 

312 NEWTON AVENUE 

ORKRHND,., CA. 54650" 9 


A FINAL WORD 

HERP SESH HHH eH HS ج ہی ۔ چ ج چ ج یج‎ 
My MAME 15 FRED STERN AND I AM 
THE EDITOR OF THIS EDITION OF 
LISTING. 


SPECIAL THANKS TO; TOM SKAPINSKI 
.EDE GILDER. DON BERRY, DONALD 
LRHEERT, AND FRED CARPENTER FOR 
THEIR HELF AND ASSISTANCE. 
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LIER. x 
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PLEASE SEND 0115653 TO: 
LIZT 
ME. HI 
5 FER : t 
VALLEY STREAM. N.Y. 11531 
FLERSE SENT SUBMISSIONS TO: 
LISTING 
MR, FEEDERIC STERN 
Po, 25i 
1ت 6۴ ات۳‎ 3... 1 
re ERE I 
Hue TSE 


HrTEE MEETS THE ה ד‎ IN 
THE MONTH RT; i 

MISS KIMS RESTAURANT 

PARK AUEMUE SOUTH 

BETWEEN 21 zT. AND 22 ST. 
MEETINGS START 7.30 PH. 


COMING EVENTS: 
SHEEP EHH HSE TES 
FEB. Sip 1 
FEB. 15. 1993 NYTSE MEETING 


MEETING MINUTES 
REPORTED EY: 
FRED STERN 


JAN. 17. 1993 
Fee HeHeeeesees 555 2% 52% 5 ESE S F PHF 
HARVEY CALLED THE MEETING סד‎ 
ORDER AT תש‎ 


HARVEY REMINDED ₪5 THAT FEBRUARY 
I2 QUES TIME. THE DATE ON THE 
LISTING ACORES: LABEL 15 WHEN 
YOUR DUES ARE DC. DO NOT BE 
CROPPED AS A LIST HEMEER,. PRY 
YOUR CUES. 

IM CORRES 1 ۴۶۳۴٣ ج‎ 5 

5 REHELR ih ÜMBER OF 
INFORM AT E LETTERS. 

WE WERE SACDENED TO HEAR THAT 
JIM CUCAHS I2 MOVING TO BOSTON, 
WE ALL WISH HIM THE BEST OF LUCE 
AND WE WILL MI22 HIM AT OUR 
MEETING. 


FEED BDUISED THAT ENQUIRIES HAVE 


HOT AS ל‎ 
COMPANIES 


aus E 5 RECUTPUBLIC 
ACCESS T.U. BROETCASTING A COM- 
FITER INFORMATION SHOL. 
HARVEY INFORMEC 72 IF A LETTER 
WE RECEIVED FROM :. FRED 
CARFENTER,. (SEE E i80) FRED 
UF-DRTED ₪ FROJE: WHICH چم ج ح حم‎ - 
ED IM THE DEC. 1 | ISSUE OF 
LISTING. AND AD ED CF A EUS IN 
THE FERSONAL Foe m MANAGER 
.8۰ے‎ 


PROGRAM FOR THE 
zx SEX 
LIST + 

ےج خب و ج ج dis‏ 
"LIST 5 LIST à LI LIST +‏ + 
ندا ج ج غ ج ج چ چ ج ججج چچچ 


QL CURNER 


The day of Christmas eve was a very joyful one. It looked like Santa 
brought me the very Christmas present I had longed for the past two 
years. Santa was a friend and LIST member Paul Chomitz, owner of the 
R.G.C. Travel Agency Ltd., NYC. Paul advised me that he would be in 
London for two days and concented to call CL Systems when he arived in 
the UK and order their CQVl QL Video Digitizer for me. The reason I 
didn't place the order from them was that CL Systems only deals in cash - 
no plastic. 


In several past issues of QL WORLD there have been reviews for both the 
SPEM digitizer (Italy) and the CL Systems (U.K.) digitizer which 
generated much interest for me. I knew I had to have one! 


Just what does a video digitizer do? The video digitizer converts normal 
video images into a digital format which can be saved to disk and/or 
printed to an Epson or Epson compatible printer. 
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The video digitizer plugs into the rear of the QL ROM (eprom) port. A 
standard double phono plug cable connects to a video source such as a 
video tape player and the other end of the cable is accepted by the video 
digitizer. That's all the hookup that is needed. 


The digitizer has one control called 'black level’. The black level 
should be adjusted for the best picture quality while you are viewing the 
video through the QL Monitor. Do not confuse black level with the 
contrast or brightness control on your monitor. Black level affects the 
pixels for the screen dumps, where contrast and brightness only affect 
the screen image on the monitor. ہے‎ 


The screen dump appearing with this article is a sample of a digitized 
picture of Anita, my sister-in-law, using the screen dump procedure from 
the software provided by CL Systems, printed on an old Epson MX-80 
printer. The Grey-scale is excellent because the software selects MODE 
8, which provides eight levels of shading for the grey-scale. I found 
that using the monochrome mode of my monitor was best when using the 
video digitizer opposed to using color. 


I had some doubts about using the digitizer until I read through the 
operating manual several times and then ran the software provided, which 
is תס‎ a 3.5" disk. A menu appears within a few seconds of loading the 
software and it is very easy to use, one keypress for each command and 
either an action occurs or a prompt appears, such as in loading or saving 
or printing screens. You can havea full screen, a quarter-screen or 
four-quarter screen. You can Invert or have a Negative picture at any 
time. You have the facilities to store a picture in memory, recall it at 
any time or merge it with another picture. 


Pixel density for a full size picture is 256 X 256 as opposed to 128 X 
128 pixels for the quarter-screen mode. 


Reading about a video digitizer does not give you the best perspective; 
you have to either use it or see it in action. If you are interested in 
obtaining one, contact CL Systems, 403 Chapter Road, Dillis Hill, London 
NW2 5NG, U.K. Tel: 081-459-1351. 

Cost is £99.00 plus £9.00 post 8 packing. 


I will demonstrate the 0071 video digitizer at the February LIST meeting 
- See you there..... Bob Gilder 
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From the desk of the Chairman 
1301 KIBLINGER PLACE 
AUBURN, IN 46706-30108 
Tele: (219) 925-1372 
11 23 1992 


TRES. ROBERT MALLOY 
S PERRI LANE 
VALLEY STREAM NY 11581 


Dear Robert, 


I see that my membership is running close to empty so I will vote for 
another year of LISTing Newsletter. My $16.00 vote is enclosed. 


About the only thing new is my playing with a program from Bill Pedersen 
that gives the first 8 RPMs of a disk drive so that you can tell if it is in 
the ball park of the correct RPM. According to the Tandon disk drive manual 
the RPM has a tolerance of +-1.5% but according to Bill that is not right 
since both the Larken and the Oliger disk interfaces have problems if the 
speed is greater than 300 RPM. So that means that the speed should be 
between 294.5 and 300. RPM. So far I only have the program for use on the 
Oliger disk interface. The program is for the 1770 disk controller chip so 
it should work on the Larken and the FDD too. But someone will need to 
change the program to allow that. What is off is the OUT port in the 
program. In checking some junk drives I had one that was reporting an RPM of 
425. and another that reported 228. Some drives have a multiturn pot on them 
to tweak the RPM and some don't. The slow drive is a Tandon and it makes a 
rubbing sound and besides it has a dragging feel when turned by hand. 
Possible some lubrication will help, whatever the trouble is it is in the 
spindle and I think in the part that descends onto the disk. The program 
will also work on a 3.5 drive. 


The important part is not the first one or two RPM but the following ones, 
and the evenness of the RPM. I also noted that if it access a drive that is 
not the one that was the last one selected that the first couple of RPM 
varies more than when it is accessed the second time. This is very handy to 
help pinpoint problems if you have been experiencing LOAD or SAVE failures. 


Had a very interesting thing happen. I wanted to use the 3.5 drive and so 1 
bought a kit to be able to use the 3.5 drive in a full sized case. It came 
with à pair of extenders, one for converting the 3.5 power to the same 
connector on a 5.25 disk drive and also a connector to convert the 3.5 drive 
to the same drive fingers that is on the 5.25 drive. Wouldn't work. Flat out 
refused to work. Much, much later I tested and found that the drive without 
the cable adaptor would work but with would not. Visually the adaptor looks 
good. But now I wonder - maybe one lead wasn't soldered to the plated thru 
hole or else the plated through hole wasn't actually plated through. Another 
day and another testing of the drive. 


I'11 put in a copy of the drive speed program for someone to use (public 
domain) if they have an Oliger disk interface. Or convert to use on the 
Larken or FDD 2068. Also a copy of the screen. 


Sinclairly yours, 


> 


Donald S. Lambert 


The program that Don described 

Es esented here. Also printed 
the program listing 19 some 

"of the screen dumps Don sent. 


be \‏ ہی 
WIDJUP DISK TESTING SERVICES WIDJUP DISK TESTING SERVICES‏ 
DISK SPEED MEASURENENT DISK SPEED MEASUREMENT‏ 

The drive you select wilt be drive you select will be 
Les ted tor acceleration and t d for acceleration and 
sustained speed. 5 ained speed. 

Before proceeding, piace a fore proceeding, place a 
disk in gour selected drive and d in your selected drive and 
eo ETS ADON: 5 its door. 

Turn Turn RPM 

. 2 ee ee LE 1 090 س‎ 
- ee 2 1 
5 2 وھ ית 2-ת-‎ ga 3 235.71 — תי میم‎ ٠ تب‎ 8 
= 1 4 299.27 
5 = 5 299.49 o 
5 8 7 
0 7 299.55 
p 3 299.32 

PRESS ANY KEY TO CONTINUE PRESS ANY KEY TO CONTINUE 
Teho tr RUC- L 
«e TRACK DA 
WIDJUP DISK TESTING SERVICES 
‘TSK 5 » Sl ₪ 
ibo SNR S RESTORE 101: FOR کا پر בת‎ 

The drive gou select will be 40007: READ w: POKE nU. HEX n 
tested for acceleration and 101 DATA 243,39, 72,155. ee iS 
BuEtained speed. 52.208 ,237,121.16 8.209! 88.8 
Before proceeding, place a 202:95112 521225. 0.d05. 51 156.4 
dizk i your 3 & 5 l^ a 9. ‘O,’ n sus E Aa Smead tar e 
اہ‎ 442 dente ری‎ MS 5/205,51,156.56,-5.115.35.114 

183 io ולו וש‎ 
ur : 102 > ے سا ا صسرت‎ tz: 
ב‎ 9,254 246,284, 59. 40.2. ,807,20.8 
2 295.16 28غ‎ 5285 2ei,e .0,0.0.0.0.0 
3 256.25 0 a D 0 E \ 
à 298148 —— —9—9—89—9—9—9—— 506 CLS : PRINT " WUIDJUF DI 
5 296.50 TESTING SERVICES | DISK 5 
5 256.39 ם‎ D MEASUREMENT". -— 
7 295.56 520 PRINT '" © The drive you žē 
8 238.07 Lect will be tested for acceter 
ation and sustained speed, 
Before ב‎ 
E23 ¥ KES cO disk in your selec "€ i 
PRESS ANY KEY TO CONTINUE a di er ene ia 
530 INPUT “Which drive? 10 TO 3 
j و‎ R - 
531 OUT 185,0: PAUSE 50: OUT 18 
ر‎ P852" | ET ۵8ں‎ 59936 
otf i 32 w=USR 399 " 
10 ORe E 533 INK 1: PLOT 100.81: DRAW 15 
Te RAG 2 ד‎ 6.0: PLOT 100,72: DRAW 150.0: FL 
WIDJUP DISK TESTING SERVICES OT 100.63: DRAW 150.0: INK ۵ 
DISK SPEED MEASUREMENT E34 PRINT ^" Turn RPM": ON ERR 
GO TO 548: FOR n=40008 TO 40022 
drive you serert بد ہو‎ STEP 2: LET w=PEEK n+256+PEEK | 
for acceleration and ns1) 
ned speed. 535 STR (16050007W) 
re proceeding, place à. S56 IF LEN w$>6 THEN LET פש=פש‎ i 
n your selected drive and TO 6) 
its door. 537 PRINT " %:0003ם-2/א;"‎ “iw 
5 
Turn, RPM 538 INK 1: PLOT 8¥(n-399941 70+ 
1 302.05 جم‎ 2.5s(URHL W$-300): DRAW 2.0: DRAW 
2 301.55 1 r Q.4: DRAW -4,0: DRAW 6.54: DRAN 
3 299.10 _— opoe 2,0: INK 0 
کسر نت نت‎ 548 NEXT n: ON ERR RESET .  . 
= 9 S50 PRINT ''" PRESS ANY KEY 
5 2935.52 TO CONTINUE ". PAUSE @: GO TO 
$E 500 0 ₪ 
5 295 8889 CLEAR : SAVE ;;"DISKSPEED 
LINE 1 


FRESS ANY KEY TO CONTINUE 


The rest correlation is "i.c" 
The ciosest curve to a 
correlation af 1.0 is the LEST 
"Pit". ffter selecting the best 
"Pit", the curve may be tested 
bu inputting values of X and 
conputing *. 


The only hang-up is thet all 
data {XN and ,גצ‎ must be sreater 
than ©. This is becavse for 
curves 2, 6, 7, and 8,; 
loserithims of input data are 
computed. Since 1:95 e 
negative numbers are uncer: 
this produces an error message. 
For negative data, the progran 
would have to be modified by 
deleting the computations of 
1095 fsuch as sinx, slny. etc.) 
The variable sinx means the sun 
of intxJ, :n Case yeu tere 
wondering. This means curves 2, 
6. 7, and 8 cannot be used for 
negative data. 


"^ 


Th:s problem will be handlec فاط‎ 
a polynomial curve fir Program 
that I also have (if there is 
interest in it). The poiunaonial 
curve fit can easily handle 
positive and negative data. 


I would be interested ta KNOU 
reader feed back oun this 
progran. 


Sincerely, 


Don Berry 
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5 Feri Lane 


Vallieu Stream, RY 11581 
Gentiemen, 


Hi from a neu menber. 1 an a 
Fechaical Engineer hy 
٣۲۲۵۲55 10 8:1 and enciosed i5 4 
progran for the newsletter. 
Naturallu, it is technical in 
nature, like me. It :5 3 curve 
Fit proaram. Data i5 entered 
just once and 8 different curves 
nay be tested to see hou 
accurately they fit the data. 
the data i5 a set of x and y 
values. BY regression, the 
curves produce 383 8 to 
م8‎ ۶: × 1 aate values of T, given 
X. The coefficients for the 
ecuatians 35 סש‎ 1 1 as the 
accuracy tCcorrelation) are 
computed. It works surprisingly 
fast, even on the trusty ۰ 
Since it is written entirely in 
BESIC, it could be typed 
directly into a TS2@68 aiso. 


‘BEES "اک جع‎ 
“(SOLVE FOR A סאה‎ E'' 
"1 -- Y = A + Eee iLI 


930 PRINT 

906 PRINT "8 -- Y = R«BsLH'!* 
LOGARITHMIC!” 

1000 PRINT 
1010 FRIHT 
ناج‎ 66۴81 10( " 
1 28 PRINT 
1836 PRINT 
ERBOLIc)" 
1948 PRINT 
1050 PRINT "S == ysl (Atbse ؛‎ 
FREE LIHERR!" 

1960 ۳ 
1878 PRINT 
METRIC)" 
1880 FRINT 
19989 PRINT 


à FRINT 
1110 FRI ND Sa = Y as AES BEAN 
EXFONEHTIBL!' 


"5 -— Y = ABEL f 


"4 ve Y = AABN 


"EB -- Y = א--2+5‎ 


1128 FEINT © (E=2.,.71328131” 
1129 FFINT 
114g FFIMT “INPUT NO. CHOICE" 
1158 INPUT C 
1178 IF ₪51 THEN GOTO 1309 
1123 “IF C=2 THEN GOTO 1522 
1108 IF C23 THEN GOTO 123-22 
1200 IF C=4 THEN GOTO 2222 
1210 IF C25 THEN GOTO 2518 
122880 IF C= THEN GOTO 2972 
i230 IF C=? THEN GOTO 3222 
1240 IF C23 THEN GOTO 3728 
1258 GOTO 8 
1308 REM LINEAR FIT : 
1318 LET EzilMzSXY- 13X25: 5ے [י‎ 
IEE 
כושם‎ 
E 


. لاک ہے 


i Y 
ב‎ )٢۷ چا ا‎ SY be (hese 
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A CX 
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FDriMsB5X8B-Sxs5X ے٤۷‎ 2 
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“LINEAR MODEL.: ` 


G03 UB 2508 
REM LINERR FIT 
cossus saoe 
LET ب *+צפ+מבל‎ 
FRIHT 
PRINT "FOR X ug M 
FRIHT 
PRIHT 
FRIHT 
PRIHT 


0 رن ADD‏ כ כו = 


Y 4 ; Y 


“ANOTHER X 7 "ואוו‎ 


Ut un cu Or UL UI =) 
I ON CAO CG CO CO Ci CN 


H 
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1565 PRIHT 

1570 INPUT B$ , 

1559 IF B$=" N THEH כדסט‎ 0 

1sae IF B$=. £4" THEN GOTO 1498 

1528 FEM LOGARITHMIC 

1220 LET = 57+ | 2 )ا‎ | 
51 4× - 1 E -8L' i113 

15489 LET RH2isY-EsSLHE?) oN 

isse LET EH2iHMzS5YLMX-SY*zLHX)*iH 
23yL HX-5Y + 

1650 LET RDzINESSLNX2-SLH«*SLHXI + 
IHxzY2-£Y*5Y! 

1570 LET R= tRN-RD) 

isse CLS 

1226 FRIHT 

i768 PRINT “LOGARITHMIC "םסכ‎ 
1708 PRIHT 

1718 GOSUE 6500 

4735 IF Age y" THEN GOTO 1818 
1510 REM LOG FIT 


3 n 
ANY. 
ES: 
ONCE 
BE : 


a PD) 


(LM 


(LN 


X*LN 


10 FEM MULTICURVE -— 
30 REM BY DH BERRY 11-2-32 
20 3 
4@ PRINT 
SQ PRINT "THIS PROGRAM FIT 
SET" ^T ^ 
Ea PRINT "OF X, Y CATA TO 
OF" 00 
SS PRINT "8 DIFFERENT CURV 
DATA" = 
70 PRINT "I8 ENTERED JUST 
75 PRINT ‘NOTE: DATA MUST 
a 
PRINT 
ERINT “INPUT S TO START 
PRINT 


INFOT 35 

IF دہ‎ 5" THEN GOTO 150 
IF 5549757 THEN GOTO + 
REM INTTIALIZATION 


f ו ו‎ c een n 2 + 


I 
INT "INPUT NO. OF CAT 
I 


מ 


PUT H 
INT ₪ 


R 151 TON 
“INPUT 


PUT א‎ 


7 
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KE 
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= 
14 


“INPUT Y";I 
26 ۲ 
INPUT wv 
ERIHT 
PRINT x 
LET 4 
LET 
LET 
LET 
LET 
LET 
LET 


CET 
LET 
LET 
LET 
LET 
LET 
LET 
LEE 


Nx LNX4LN X 

NxZ=SSLNX2+(LN + 
-SYLHX4Y SLM X 

+ + + ج 

QY FEK EY 


LET Vy SSMDY +: 
LET ٣۷ =SLNY $ 
LET NVSSSUNYSA (LN v)s 


/(LHY-SXLNY-4X«LH Y 
NXLNYsSLNXLNY اطا+‎ 


LET גב‎ 
LET 5 
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PRINT 
INFUT E$ 


LH SEs אוה‎ 
RTS ا‎ 

4+ ו+ואבצ+צאב-2א5+ו ےدام ‘LET‏ 
]+ 4% - םש 

zero LET R=iRH/RD] 


eos 

PRINT 

PRINT “GEOMETRIC MOCEL 
ERIH 

FRIN 5 >5 ٭‎ + 

PRIN 

5050 

SF IN 

REM SECMETRIC 

50505 % 

LET Y 

FRINT 

PRINT "FOR X = "jx 
PRINT 

PRINT ^ ce 
PRINT 

PRINT “ANOTHER T (v. הו‎ 
PRINT 


INPUT ES 

IF RN THEN GOTO 4550 
IF B£z " THEN GOTO 3240 
REH POUER MODEL 
30 LET Behe 2 


3 7 P 
3430 LET BREANESUNXEHVESE +] 
*sLHY! 

3448 LET FDzIiHsSLME2-SLHsszLHxi x 
AH EZ SLI e- 2 + 5 

LET RzIRH-/RD) 


PRINT “ANOTHER ? (Y.H)" 


= 
5 
n 
mn 
H 
= 
ב‎ 


= 3 CLS 

2470 FRIHT "POWER MODEL: - 
S428 FRIIIT 

2 OQ FRINT “vy = nsxs-E 
: 9 FRIHT 

25108 cOZzyuB Esa 

3530 REM POWER 

COZUE 0‏ ف26 

BESO LET פ++<+ה5ץ‎ 

3550 PRINT 

3570 FRIHT "FOR X = پر‎ 
3830 FRIHT 

35690 PRINT " و‎ Bony 
369295 PRINT 

שקב 

2718 

37 


720 IF Bg: THEN GOTI 15292 
3740 IF 8%= THEN GOTO 28528 


me 


FEM EXPONENTIAL‏ و 
7a „EET B= INSSXLNV ۳‏ 


) F. 
J > 
10 


BO) < 


ו 


ao LET 253 -8%5%( oN 

790 LET H=E¥P Z 

LET RHsíHsSsSXLHY-sxsz LNW) # IN‏ שש 
( ات سے 5% - LNT‏ 

18 LET כ%א4+5ובפת‎ - -5X#5X1 > 5 
۳ ات سے‎ *SLHMYi 


TG) GI C) En C) 


382 LET RziRH/^/RDP) 

3830 CLS 

3840 PRINT 

3859 PRINT “EXPONENTIAL HODEL:" 
23860 FRIHT 

3378 FRIHT "Y = BsEss(Esv" 
3280 PRIHT " IE = 2.,78i14i" 
S520 PRINT 

2980 פשבטט‎ espa 


4020 REM EXPONENTIAL 
4832 EOSUS seon 

4040 LET vzH*EXP (Bx) 
4059 PRINT 

4060 FRINT "FOR X s ہر‎ 
4065 PRINT 


“INVERSE LINEAR MODEL 


2000 
-*+5 ₪ 


= 


"ANOTHER 2 Cy رپ۲‎ 


Ef 
4" THEN GOTO i258 
IF BES" 7" THEN GOTO 1312 
REH QUADRATIC 
LET EziM*B5XeEY-SX2*2571!^1!Mxs85X 
2x2 
LET HzisY-BsS5XZ).H 
LET RHziHssX2vY-5X25s27)5iHs5 
deis i UE 
(X23) (HSS 


SIR RD) 


2020 PRINT “QUADRATIC MODEL: ٣ 
2030 PRINT "Y = A + BaXssc" 


2059 BOSUE e&esaa 
פססם‎ IF AS="N" THEN 
2072 IF Ag="¥" THEN 
i e FEM GuAcRATIC 
o GOSUB ٥ 

e LET v2H4«B«sxX 

e PRINT 

e PRIHT "FOR X "FX 
e PRINT 
۵ 

e 

a 

e 

e 

e 


PRINT " = ۷ 
PRINT 

PRINT “ANOTHER X ? "וא/ו‎ 
INPUT B$ 


V כח כח גת‎ Po כח‎ Fo PO כח גוז בח‎ 
نا כו‎ TO fO FO fü f t خر‎ E = 


IF B£-"M" THEN GOTO 422 
IF "ח"בצם‎ THEN GOTO 2156 
PEM HYPERBOLIC 
LET i 


eH 
IN¥SYD X-Si1bx +4ו4+(צפי‎ 


-515%++2( 8% 


RSW 

LET ۴-۲۴۲] ( 

CLZ 

FRIHT 

ERI “HYPERBOLIC MOCEL:' 
FRI 

ER‏ ]תת 

FRIN 

Sos 

IF 4412 
IF 2360 
E 


LET AziS1DY-BxS5:‏ סכסם 
LET FHziHx5XDY-‏ 
( 10 کے ہے اہ 

g LET וא5+2-5%א4+5ו-ם2ם‎ 0 
1 

LET R= (RH-RDB) 


SLOVY) ٭‎ (N= 


Balin‏ + ق۲0 رو 


SE LINEAR 


x $4 ee 


PRINT “ANOTHER ٭‎ iv." 


4070 PRINT " Y = "iY 28: 8 
4080 PRIM 4610 STOP 
80 PRINT rt E כ‎ 
109 PRIN 5 fo 
4110 INPUT B$ Giese Rer E Re 
4188 IF B$:;“Y" THEN GOTO 4710 ps ا‎ 
4130 IF Bgz"v" THEN GOTO 8 4710 CLS 
4150 REM FINAL DISPLAYS ern Cote 
4170 CLS — 00 
ác \ 4730 PRINT “EXPONENTIAL MODEL: 
4180 PRINT “LINEAR MODEL." A RO CRINE uns Maarre 
4200 PRI 0 7ئ ا :ה הב‎ 
4210 PRINT "v = A + Bee" השס‎ 
ב 16ج‎ 4770 STOP 
הבכ‎ ۵ S000 REM TEST MODEL 
Sto CLS 5018 CLS 
doo PRINT 8٤0 CRINT i P x 24 
- ت‎ ٦ 9 "R א‎ Ww [^ E שד‎ 
4270 PRINT “LOGARITHMIC MODEL" 8030 PRINT “GIVEN X, CALILLATE 
4250 PRINT A : 
ici ae "مم‎ ۱70 Pm 8040 7 
dog nib Eleg on PAM E050 PRINT “INPUT X" 
٭‎ +868 8080 PRINT 
4310 STO PUT X 
$330 CLS 6070 INPUT X 
1340 PRINT 8080 PRINT . 
4350 PRINT “QUADRATIC MOCEL:" 5090 FRINT X 
4360 PRINT 5100 EET 
4370 FRIMT "Y = A + ےئ ریع‎ 6110 RETURN سے‎ ETE 
1380 COSUB E18 6150 REM DISPLAY CONSTANTS 
SS 08 8170 PRINT 
4390 5 5 ۱ 7 
4410 CLS 5180 PRINT "A = “jn 
1120 PRINT ۱ 6190 PRINT p 2 
4430 PRINT “HYPERBOLIC MODEL 6200 PRINT "B = ";B 
TIO EET 6210 PRINT 
שה‎ CR M S 6220 PRINT “CORRELATION = ";R 
- JJ קב , שש‎ 
4460 GUSUB 6160 8210 RETURN 
4490 CLS 6500 REM DISFLRY CONSTANTS 
4490 PRINT 6510 PRINT הנ" = ה"‎ 
4500 PRINT “INVERSE LINEAR MODEL S830 PRINT "B = "jB 
tram ₪ : 6540 : 
BTN WY EE E ol 6550 PRINT "CORRELATION = ";R 
1510 stop ללד"‎ 8570 PRINT "OK 7 (Y/N)" 
TILO OTO 6580 PRINT 
1550 ERINT 5800 IF :جم‎ Y" THEN GOT? 930 
DOR PES AG REL d 0٤ج‎ + "ץצ"‎ GOT? 9: 
4570 PRINT “GEOMETRIC MOTEL: $609 IF Agcy THEN RETURN 
4580 FRINT 5900 RETURN 
4590 FRIMT "v = ABER" 9 | 
m. Sog. ہی کے‎ 
T 3i ESX 4% Ess 
x X D ka 4 ! N cx x 
۰ - 7 tt 
§ 45 WD RAM پک‎ = 
~ eh کا ריש‎ 3 & 3 
a =~ ES 8 جن وم‎ Ig SSE S 
NY ` , جا פס‎ ® SS 
SO ROAS? WO eh X 
یں فو ہی تہ‎ DUET SÛN אי‎ 
S ماک وق‎ D NIR 
: ` = o 
~ ₪ se WSS asap kb ES 
Fg Q 3 3 
= ¥ sa % = % کچ‎ i 3 
` uq o n> یت‎ "3 4 
= mi = SSR re 2 ב‎ A בי‎ 
= w = . i ei Re xs INL 
< < e; 7 AS W ° N X = 
ےہ کچل نہ‎ e ¥ Dame ^| x 5 2s 
رہ‎ 9e — NR אא‎ RD 
~ ly N ۰ c» | ב نج קל‎ = SS 
Chm = ھا ےےل‎ d - Sy 
8 2 AN “Sec EN d €i REN 
S ME: S = = e RU دی‎ 
ds = א‎ TZS We. 
r4 Qe S38 


